object Unity_VerilenSiparislerF: TUnity_VerilenSiparislerF
  Left = 149
  Top = 163
  Width = 948
  Height = 533
  Caption = 'Verilen Sipari'#351' Listesi'
  Color = clBtnFace
  Font.Charset = TURKISH_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefaultPosOnly
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 940
    Height = 77
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 11
      Width = 45
      Height = 14
      Caption = 'Ba'#351'.Tarih'
      Transparent = True
    end
    object Label2: TLabel
      Left = 8
      Top = 36
      Width = 38
      Height = 14
      Caption = 'Bit.Tarih'
      Transparent = True
    end
    object Label3: TLabel
      Left = 203
      Top = 11
      Width = 55
      Height = 14
      Caption = 'Sipari'#351' No  '
      Transparent = True
    end
    object Label4: TLabel
      Left = 355
      Top = 11
      Width = 36
      Height = 14
      Caption = 'D'#246'nem '
      Transparent = True
    end
    object Label7: TLabel
      Left = 204
      Top = 36
      Width = 44
      Height = 14
      Caption = 'Firma Ad'#305
      Transparent = True
    end
    object bastarihk: TwwDBDateTimePicker
      Left = 68
      Top = 8
      Width = 121
      Height = 22
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 0
    end
    object Bittarihk: TwwDBDateTimePicker
      Left = 68
      Top = 32
      Width = 121
      Height = 22
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 1
    end
    object edSiparisNo: TEdit
      Left = 255
      Top = 7
      Width = 93
      Height = 22
      TabOrder = 2
    end
    object DONEM: TwwDBComboBox
      Left = 391
      Top = 7
      Width = 69
      Height = 22
      ShowButton = True
      Style = csDropDown
      MapList = True
      AllowClearKey = True
      AutoDropDown = True
      ShowMatchText = True
      Color = clWhite
      DropDownCount = 8
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 0
      Items.Strings = (
        '2008'#9'2008')
      ParentFont = False
      Sorted = False
      TabOrder = 3
      UnboundDataType = wwDefault
    end
    object edFirmaAdi: TwwDBEdit
      Tag = 2
      Left = 255
      Top = 32
      Width = 204
      Height = 22
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 465
    Width = 940
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      940
      41)
    object Label5: TLabel
      Left = 299
      Top = 7
      Width = 58
      Height = 14
      Caption = 'Yeni Kay'#305't :'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label6: TLabel
      Left = 278
      Top = 23
      Width = 80
      Height = 14
      Caption = 'De'#287'i'#351'en Kay'#305't :'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object blistele: TBitBtn
      Left = 8
      Top = 10
      Width = 97
      Height = 25
      Caption = 'Listele - F5'
      TabOrder = 0
      OnClick = blisteleClick
    end
    object BitBtn1: TBitBtn
      Left = 862
      Top = 8
      Width = 73
      Height = 25
      Anchors = [akRight]
      Caption = '&Kapat'
      TabOrder = 1
      OnClick = BitBtn1Click
    end
    object bSiparisAc: TBitBtn
      Left = 112
      Top = 10
      Width = 97
      Height = 25
      Caption = '&Sipari'#351' Ayr'#305'nt'#305's'#305
      TabOrder = 2
      OnClick = bSiparisAcClick
    end
    object bdegisensiparisvarmi: TBitBtn
      Left = 712
      Top = 8
      Width = 139
      Height = 25
      Caption = '&De'#287'i'#351'en Sipari'#351' '#199'ek'
      TabOrder = 3
      OnClick = bdegisensiparisvarmiClick
    end
    object bSiparisCek: TBitBtn
      Left = 608
      Top = 8
      Width = 97
      Height = 25
      Caption = '&Yeni Sipari'#351' '#199'ek'
      TabOrder = 4
      OnClick = bSiparisCekClick
    end
    object StaticText1: TStaticText
      Left = 373
      Top = 7
      Width = 59
      Height = 18
      Caption = 'Toplam [ 0 ]'
      TabOrder = 5
    end
    object StaticText2: TStaticText
      Left = 373
      Top = 23
      Width = 59
      Height = 18
      Caption = 'Toplam [ 0 ]'
      TabOrder = 6
    end
  end
  object DegistiPanel: TPanel
    Left = 505
    Top = 244
    Width = 345
    Height = 209
    TabOrder = 2
    Visible = False
    object Shape1: TShape
      Left = 1
      Top = 1
      Width = 343
      Height = 207
      Align = alClient
      Brush.Color = clMaroon
      Pen.Color = clBtnFace
    end
    object Memo1: TMemo
      Left = 5
      Top = 6
      Width = 333
      Height = 167
      TabOrder = 0
    end
    object BitBtn3: TBitBtn
      Left = 263
      Top = 178
      Width = 75
      Height = 25
      Caption = 'Kapat'
      TabOrder = 1
      OnClick = BitBtn3Click
    end
  end
  object cxgrid1: TcxGrid
    Left = 0
    Top = 77
    Width = 940
    Height = 388
    Align = alClient
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    LookAndFeel.Kind = lfUltraFlat
    LookAndFeel.NativeStyle = True
    object cxgrid1DBTableView1: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataModeController.GridMode = True
      DataController.DataSource = DSCspr_Verilen_SiparisL
      DataController.Filter.Active = True
      DataController.Filter.AutoDataSetFilter = True
      DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
      DataController.Summary.DefaultGroupSummaryItems = <
        item
          Format = 'Adet : #'
          Kind = skCount
          FieldName = 'StokKodu'
        end>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.IncSearch = True
      OptionsData.CancelOnExit = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsSelection.CellSelect = False
      OptionsSelection.UnselectFocusedRecordOnExit = False
      OptionsView.Indicator = True
      Styles.StyleSheet = dm.tvssDevExpress
      object cxgrid1DBTableView1OnayDurum: TcxGridDBColumn
        Caption = 'Onay'
        DataBinding.FieldName = 'Onay Durum'
        Width = 51
      end
      object cxgrid1DBTableView1DATE_: TcxGridDBColumn
        Caption = 'Tarih'
        DataBinding.FieldName = 'DATE_'
        Width = 73
      end
      object cxgrid1DBTableView1FICHENO: TcxGridDBColumn
        Caption = 'Sipari'#351' No'
        DataBinding.FieldName = 'FICHENO'
        Width = 70
      end
      object cxgrid1DBTableView1DONEM: TcxGridDBColumn
        Caption = 'D'#246'nem'
        DataBinding.FieldName = 'DONEM'
      end
      object cxgrid1DBTableView1DOCODE: TcxGridDBColumn
        Caption = 'Belge No'
        DataBinding.FieldName = 'DOCODE'
        Width = 80
      end
      object cxgrid1DBTableView1Unvan: TcxGridDBColumn
        Caption = 'Cari Hesap '#220'nvan'#305
        DataBinding.FieldName = 'Unvan'
        Width = 297
      end
      object cxgrid1DBTableView1GROSSTOTAL: TcxGridDBColumn
        Caption = 'Tutar'
        DataBinding.FieldName = 'GROSSTOTAL'
        Width = 74
      end
      object cxgrid1DBTableView1REPORTNET: TcxGridDBColumn
        Caption = 'D'#246'vizli Tutar'
        DataBinding.FieldName = 'REPORTNET'
        SortIndex = 0
        SortOrder = soAscending
        Width = 98
      end
      object cxgrid1DBTableView1SOURCEINDEX: TcxGridDBColumn
        Caption = 'Ambar'
        DataBinding.FieldName = 'SOURCEINDEX'
        Width = 75
      end
    end
    object cxgrid1BandedTableView1: TcxGridBandedTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      Bands = <
        item
        end>
    end
    object cxgrid1DBTableView2: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
    end
    object TvAriza: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DetailKeyFieldNames = 'formno'
      DataController.KeyFieldNames = 'formno'
      DataController.MasterKeyFieldNames = 'FormNo'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsData.CancelOnExit = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      object TvArizaTuru: TcxGridDBColumn
        Caption = 'Ar'#305'za Turu'
        DataBinding.FieldName = 'ArizaText'
        Width = 91
      end
      object TvArizaParDeg1: TcxGridDBColumn
        Caption = 'Par'#231'a De'#287'i'#351'imi'
        DataBinding.FieldName = 'StokCinsi'
        Width = 271
      end
      object TvArizaMontaj: TcxGridDBColumn
        Caption = 'Montaj Durumu'
        DataBinding.FieldName = 'montajhatasi'
        Width = 53
      end
    end
    object cxgrid1DBTableView3: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
    end
    object cxgrid1Level1: TcxGridLevel
      GridView = cxgrid1DBTableView1
    end
  end
  object Unity_VerilenSiparislerQ: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltReadOnly
    OnCalcFields = Unity_VerilenSiparislerQCalcFields
    Parameters = <>
    SQL.Strings = (
      'select top 1 * from UNITY_DB..LG_018_01_ORFICHE')
    Left = 184
    Top = 144
  end
  object Unity_VerilenSiparislerQS: TDataSource
    DataSet = Unity_VerilenSiparislerQ
    Left = 184
    Top = 192
  end
  object Firmalar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <>
    SQL.Strings = (
      
        'select LOGICALREF=unityCarikod,DEFINITION_=FirmaAdi from cari wh' +
        'ere UnityCarikod is Not null order by Carikod')
    Left = 784
    Top = 232
  end
  object FirmaBul: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'CLIENTREF'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select carikod,carikodu,firmaadi from cari '
      'where unitycarikod=:CLIENTREF'
      '')
    Left = 192
    Top = 352
  end
  object SiparisHar: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'siparisid'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      
        'select CODE,AMOUNT FROM LG_017_01_ORFLINE,LG_017_ITEMS WHERE LG_' +
        '017_01_ORFLINE.STOCKREF=LG_017_ITEMS.LOGICALREF '
      'AND ORDFICHEREF=:SiparisID')
    Left = 160
    Top = 288
  end
  object StokBul: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'unitystokkod'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select stokkod,ambar,stokkodu from stok'
      'where unitystokkod=:unitystokkod')
    Left = 448
    Top = 320
  end
  object BizimAmbarIDQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'SOURCEINDEX'
        Attributes = [paSigned, paNullable]
        DataType = ftSmallint
        Precision = 5
        Size = 2
        Value = Null
      end>
    SQL.Strings = (
      'select id from depolar'
      'where unityid=:SOURCEINDEX')
    Left = 800
    Top = 168
  end
  object FaturaQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'belgeno'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      'set rowcount 1'
      'select top 1 isnull(durum,1) as durum from fatura'
      'where belgeno=:belgeno')
    Left = 280
    Top = 368
  end
  object AmbarlarQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'belgeno'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      'select * from depolar Where Aktif=1')
    Left = 80
    Top = 264
  end
  object Unity_DegisenSiparisAlQ: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'baszaman'
        Size = -1
        Value = Null
      end
      item
        Name = 'bitzaman'
        Size = -1
        Value = Null
      end>
    SQL.Strings = (
      
        'SELECT carikodu=(select code from LG_017_CLCARD where LG_017_CLC' +
        'ARD.LOGICALREF=LG_017_01_ORFICHE.CLIENTREF),LOGICALREF,FICHENO a' +
        's belgeno,SOURCEINDEX as ambar FROM  LG_017_01_ORFICHE '
      
        'where  (Convert(Varchar(8),CAPIBLOCK_MODIFIEDDATE,112)+str(CAPIB' +
        'LOCK_MODIFIEDHOUR,2)+str(CAPIBLOCK_MODIFIEDMIN,2)+str(CAPIBLOCK_' +
        'MODIFIEDSEC,2))>:baszaman'
      '       AND'
      
        '       (Convert(Varchar(8),CAPIBLOCK_MODIFIEDDATE,112)+str(CAPIB' +
        'LOCK_MODIFIEDHOUR,2)+str(CAPIBLOCK_MODIFIEDMIN,2)+str(CAPIBLOCK_' +
        'MODIFIEDSEC,2))<=:bitzaman'
      'AND TRCODE=2 and STATUS=4')
    Left = 632
    Top = 144
  end
  object MaxZamanYeni: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Prepared = True
    Left = 32
    Top = 144
  end
  object soncekiszamaniYeni: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select soncekiszamani_verilensiparisyeni from unity_servis')
    Left = 72
    Top = 296
  end
  object Unity_DegisenSiparisHarQ: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'LOGICALREF'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      
        'select top 1 CODE as stokkodu,AMOUNT as miktar FROM LG_017_01_OR' +
        'FLINE,LG_017_ITEMS'
      
        ' WHERE LG_017_01_ORFLINE.STOCKREF=LG_017_ITEMS.LOGICALREF  AND O' +
        'RDFICHEREF=:LOGICALREF'
      'order by stokkodu,miktar')
    Left = 832
    Top = 280
  end
  object DegisenFaturaQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'belgeno'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      
        'select bilisno,carikodu=dbo.getcarikodu(carikod),belgeno,ambar f' +
        'rom fatura'
      'where belgeno=:belgeno')
    Left = 848
    Top = 184
  end
  object DegisenFatharQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'belgeno'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      'select dbo.getstokkodu(stokkod) as stokkodu,miktar from fathar'
      'where bilisno'
      'in'
      '('
      'select bilisno from fatura'
      'where belgeno=:belgeno'
      ')'
      'order by stokkodu,miktar')
    Left = 840
    Top = 232
  end
  object MaxZamanDeg: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Prepared = True
    Left = 32
    Top = 200
  end
  object soncekiszamaniDeg: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select soncekiszamani_verilensiparisdeg from unity_servis')
    Left = 72
    Top = 352
  end
  object Cspr_Verilen_Siparis: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    OnCalcFields = Unity_VerilenSiparislerQCalcFields
    Parameters = <>
    SQL.Strings = (
      'select  *  from CS_02_ORFICHE where ID=0')
    Left = 448
    Top = 200
  end
  object Cspr_Verilen_SiparisL: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    OnCalcFields = Unity_VerilenSiparislerQCalcFields
    Parameters = <>
    SQL.Strings = (
      'select top 1 C.Firmaadi As Unvan,'
      '(Case O.Status '
      'when 1 then '#39#214#39
      'when 2 then '#39'X'#39
      'when 4 then '#39'S'#39' end) as [Onay Durum],'
      ''
      'O.* from dbo.CS_02_ORFICHE O join Cari C '
      'on C.unitycarikod=O.CLIENTREF')
    Left = 304
    Top = 216
  end
  object DSCspr_Verilen_SiparisL: TDataSource
    DataSet = Cspr_Verilen_SiparisL
    Left = 304
    Top = 264
  end
  object CariBul: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'LOGICALREF'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    Prepared = True
    SQL.Strings = (
      
        'select caspercarikodu=carikodu,CODE=Carikodu,caspercarikod=carik' +
        'od,Guzergahkod'
      'from cari'
      'where unityCarikod=:LOGICALREF')
    Left = 448
    Top = 144
  end
  object Cspr_Verilen_SiparisHar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    OnCalcFields = Unity_VerilenSiparislerQCalcFields
    Parameters = <>
    SQL.Strings = (
      'select  *  from CS_02_ORFLINE where  ID = 0')
    Left = 448
    Top = 256
  end
  object Unity_SiparisHarAl: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandTimeout = 100
    Parameters = <
      item
        Name = 'baszaman'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 14
        Precision = 14
        Size = 4
        Value = Null
      end
      item
        Name = 'bitzaman'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 14
        Precision = 14
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      
        'SELECT unitystokkodu=(select code from LG_018_ITEMS with(nolock)' +
        ' where LG_018_ITEMS.LOGICALREF=LG_018_01_ORFLINE.STOCKREF),LOGIC' +
        'ALREF,ORDFICHEREF,STOCKREF,AMOUNT,PRPRICE FROM  LG_018_01_ORFLIN' +
        'E WHERE LINETYPE=0 AND ORDFICHEREF IN'
      '('
      
        '  SELECT LOGICALREF FROM LG_018_01_ORFICHE with(nolock) WHERE LO' +
        'GICALREF IN '
      '  ('
      '    select PARLOGREF from LG_XT052001_018 with(nolock) '
      
        '    where (Convert(Varchar(8),FLDSTATDATE,112)+STR(FLDSTATTIME))' +
        '>:baszaman and (Convert(Varchar(8),FLDSTATDATE,112)+STR(FLDSTATT' +
        'IME))<=:bitzaman'
      '  )'
      '  AND STATUS=4 AND (SOURCEINDEX=0 or SOURCEINDEX=6)'
      ')')
    Left = 448
    Top = 376
  end
  object adoTemp: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      '')
    Left = 576
    Top = 224
  end
end
